home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 November / macformat-018.iso / Comms Spectacular / MacTCP / Finger 1.3.7 / Tokens / ParameterDef.unit < prev    next >
Encoding:
Text File  |  1991-12-17  |  933 b   |  23 lines  |  [TEXT/PJMM]
  1. unit ParameterDef;
  2.  
  3. interface
  4.  
  5.     type
  6.         parameterRecord = record
  7.                 fingeredname: stringPtr;            { Input        - finger name }
  8.                 param: stringPtr;                    { Input        - parameter following special }
  9.                 returnvalue: stringPtr;            { Output    - return string, appeneded to finger output.  Don't change ptr! }
  10.                 fingeroutput: handle;                { Input/Output    - finger output as its built. }
  11.                 hlength: longInt;                    { Input    /Output    -  handle length.  }
  12.                 offset: longInt;                        { Input/Output - offset from start of handle that finger output is up to }
  13.                 idle: longInt;                        { Input        - Idle time in seconds }
  14.                 remoteIP: longInt;                    { Input        - IP number of fingerer }
  15.                 expandtokens: boolean;            { Output    - Expand <cr>s and %tokens inserted into the fingeroutput handle }
  16. { Note: No extra expansion is done for strings.  If you have <cr>s in them, put <cr><lf> instead. }
  17.             end;
  18.  
  19. {  procedure Main (var p: parameterRecord); }
  20.  
  21. implementation
  22.  
  23. end.